home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 4: GNU Archives / Linux Cubed Series 4 - GNU Archives.iso / gnu / gawk-3.000 / gawk-3 / gawk-3.0.0 / test / regtest < prev    next >
Encoding:
Text File  |  1993-10-20  |  265 b   |  19 lines
  1. #! /bin/sh
  2.  
  3. case "$AWK" in
  4. "")    AWK=../gawk ;;
  5. esac
  6. #AWK=${AWK:-../gawk}
  7.  
  8. for i in reg/*.awk
  9. do
  10.     it=`basename $i .awk`
  11.     $AWK -f $i <reg/$it.in >reg/$it.out 2>&1
  12.     if cmp -s reg/$it.out reg/$it.good
  13.     then
  14.         rm -f reg/$it.out
  15.     else
  16.         echo "regtest: $it fails"
  17.     fi
  18. done
  19.